home *** CD-ROM | disk | FTP | other *** search
/ TPUG - Toronto PET Users Group / TPUG Users Group CD / TPUG Users Group CD.iso / C64 / M-More Monthly Disks / (c)md.d64 / 100meterloader.c (.txt) < prev    next >
Commodore BASIC  |  2007-02-04  |  682b  |  23 lines

  1. 0 POKE53281,2:POKE53280,2:PRINT "[158]";
  2. 5 IF F=0 THEN F=1:LOAD"100 METER.ML",8,1
  3. 10 REM RACE INSTRUCTIONS
  4. 14 PRINT CHR$(14)
  5. 20 PRINT "[147]             100 [205][197][212][197][210] [196][193][211][200]"
  6. 25 PRINT "             BY  [196]EAN [208]ERRY"
  7. 30 PRINT "   [212]HE TOP RUNNER USES THE '1' AND '2'"
  8. 40 PRINT "ALTERNATELY TO RUN. [212]HE BOTTOM PLAYER"
  9. 50 PRINT "IS CONTROLLED BY THE ',' AND '.' KEYS."
  10. 60 PRINT "   [212]HE FIRST PERSON TO THE FINISH LINE"
  11. 70 PRINT "IS THE [215][201][206][206][197][210]. [203]EEP TRACK OF YOUR TIMES"
  12. 80 PRINT "TO MEASURE YOUR IMPROVEMENT."
  13. 90 PRINT "   [200][193][214][197][160][198][213][206]!!!"
  14. 95 PRINT "[200]IT [210][197][212][213][210][206][146] TO START."
  15. 96 GET A$:IF A$<>CHR$(13) THEN 96
  16. 100 PRINT CHR$(142);:SYS 49152
  17. 110 PRINT CHR$(14);
  18. 120 PRINT "[147] [193]NOTHER GAME? ";
  19. 130 GET A$:IF A$<>"N" AND A$<>"Y" THEN 130
  20. 140 PRINT A$:IF A$="Y" THEN 100
  21. 150 SYS 64738
  22. 160 END
  23.